home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 6 (Reseller Edition) / Apple Ref. & Pres. Lib.v6.0.toast / mac / 3-Presentations / Markets / Eng.:Science Markets / Eng:Sci Guide / Open Me First / card_20626.txt < prev    next >
Text File  |  1990-08-14  |  8KB  |  393 lines
  1. -- card: 20626 from stack: in
  2. -- bmap block id: 12857
  3. -- flags: 0000
  4. -- background id: 13452
  5. -- name: Main Title 2
  6. ----- HyperTalk script -----
  7. on openCard
  8. end openCard
  9.  
  10.  
  11.  
  12. -- part 1 (button)
  13. -- low flags: 80
  14. -- high flags: 0001
  15. -- rect: left=14 top=115 right=170 bottom=76
  16. -- title width / last selected line: 0
  17. -- icon id / first selected line: 0 / 0
  18. -- text alignment: 1
  19. -- font id: 0
  20. -- text size: 12
  21. -- style flags: 0
  22. -- line height: 16
  23. -- part name: 
  24. ----- HyperTalk script -----
  25. on mouseUp
  26.   go to card id 15046
  27. end mouseUp
  28.  
  29.  
  30.  
  31.  
  32. -- part 2 (button)
  33. -- low flags: 80
  34. -- high flags: 0001
  35. -- rect: left=114 top=117 right=172 bottom=176
  36. -- title width / last selected line: 0
  37. -- icon id / first selected line: 0 / 0
  38. -- text alignment: 1
  39. -- font id: 0
  40. -- text size: 12
  41. -- style flags: 0
  42. -- line height: 16
  43. -- part name: 
  44. ----- HyperTalk script -----
  45. on mouseUp
  46.   go to card id 15046
  47. end mouseUp
  48.  
  49.  
  50.  
  51.  
  52. -- part 3 (button)
  53. -- low flags: 80
  54. -- high flags: 0001
  55. -- rect: left=218 top=117 right=172 bottom=280
  56. -- title width / last selected line: 0
  57. -- icon id / first selected line: 0 / 0
  58. -- text alignment: 1
  59. -- font id: 0
  60. -- text size: 12
  61. -- style flags: 0
  62. -- line height: 16
  63. -- part name: 
  64. ----- HyperTalk script -----
  65. on mouseUp
  66.   go to card id 15046
  67. end mouseUp
  68.  
  69.  
  70.  
  71.  
  72. -- part 4 (button)
  73. -- low flags: 80
  74. -- high flags: 0001
  75. -- rect: left=322 top=118 right=173 bottom=384
  76. -- title width / last selected line: 0
  77. -- icon id / first selected line: 0 / 0
  78. -- text alignment: 1
  79. -- font id: 0
  80. -- text size: 12
  81. -- style flags: 0
  82. -- line height: 16
  83. -- part name: 
  84. ----- HyperTalk script -----
  85. on mouseUp
  86.   go to card id 15046
  87. end mouseUp
  88.  
  89.  
  90.  
  91.  
  92. -- part 5 (button)
  93. -- low flags: 80
  94. -- high flags: 0001
  95. -- rect: left=421 top=116 right=171 bottom=483
  96. -- title width / last selected line: 0
  97. -- icon id / first selected line: 0 / 0
  98. -- text alignment: 1
  99. -- font id: 0
  100. -- text size: 12
  101. -- style flags: 0
  102. -- line height: 16
  103. -- part name: 
  104. ----- HyperTalk script -----
  105. on mouseUp
  106.   go to card id 15046
  107. end mouseUp
  108.  
  109.  
  110.  
  111.  
  112. -- part 6 (button)
  113. -- low flags: 80
  114. -- high flags: 0001
  115. -- rect: left=18 top=277 right=332 bottom=80
  116. -- title width / last selected line: 0
  117. -- icon id / first selected line: 0 / 0
  118. -- text alignment: 1
  119. -- font id: 0
  120. -- text size: 12
  121. -- style flags: 0
  122. -- line height: 16
  123. -- part name: 
  124. ----- HyperTalk script -----
  125. on mouseUp
  126.   go to card id 15046
  127. end mouseUp
  128.  
  129.  
  130.  
  131.  
  132. -- part 7 (button)
  133. -- low flags: 80
  134. -- high flags: 0001
  135. -- rect: left=117 top=275 right=330 bottom=179
  136. -- title width / last selected line: 0
  137. -- icon id / first selected line: 0 / 0
  138. -- text alignment: 1
  139. -- font id: 0
  140. -- text size: 12
  141. -- style flags: 0
  142. -- line height: 16
  143. -- part name: 
  144. ----- HyperTalk script -----
  145. on mouseUp
  146.   go to card id 15046
  147. end mouseUp
  148.  
  149.  
  150.  
  151.  
  152. -- part 8 (button)
  153. -- low flags: 80
  154. -- high flags: 0001
  155. -- rect: left=221 top=274 right=329 bottom=283
  156. -- title width / last selected line: 0
  157. -- icon id / first selected line: 0 / 0
  158. -- text alignment: 1
  159. -- font id: 0
  160. -- text size: 12
  161. -- style flags: 0
  162. -- line height: 16
  163. -- part name: 
  164. ----- HyperTalk script -----
  165. on mouseUp
  166.   go to card id 15046
  167. end mouseUp
  168.  
  169.  
  170.  
  171.  
  172. -- part 9 (button)
  173. -- low flags: 80
  174. -- high flags: 0001
  175. -- rect: left=315 top=278 right=331 bottom=399
  176. -- title width / last selected line: 0
  177. -- icon id / first selected line: 0 / 0
  178. -- text alignment: 1
  179. -- font id: 0
  180. -- text size: 12
  181. -- style flags: 0
  182. -- line height: 16
  183. -- part name: 
  184. ----- HyperTalk script -----
  185. on mouseUp
  186.   go to card id 15046
  187. end mouseUp
  188.  
  189.  
  190.  
  191.  
  192. -- part 10 (button)
  193. -- low flags: 80
  194. -- high flags: 0001
  195. -- rect: left=420 top=275 right=333 bottom=503
  196. -- title width / last selected line: 0
  197. -- icon id / first selected line: 0 / 0
  198. -- text alignment: 1
  199. -- font id: 0
  200. -- text size: 12
  201. -- style flags: 0
  202. -- line height: 16
  203. -- part name: 
  204. ----- HyperTalk script -----
  205. on mouseUp
  206.   go to card id 15046
  207. end mouseUp
  208.  
  209.  
  210.  
  211.  
  212. -- part 13 (field)
  213. -- low flags: 01
  214. -- high flags: 2000
  215. -- rect: left=98 top=164 right=249 bottom=405
  216. -- title width / last selected line: 0
  217. -- icon id / first selected line: 0 / 0
  218. -- text alignment: 0
  219. -- font id: 3
  220. -- text size: 12
  221. -- style flags: 0
  222. -- line height: 16
  223. -- part name: Home Btn Explanation
  224.  
  225.  
  226. -- part 14 (button)
  227. -- low flags: 00
  228. -- high flags: 0000
  229. -- rect: left=0 top=246 right=342 bottom=512
  230. -- title width / last selected line: 0
  231. -- icon id / first selected line: 0 / 0
  232. -- text alignment: 1
  233. -- font id: 0
  234. -- text size: 12
  235. -- style flags: 0
  236. -- line height: 16
  237. -- part name: Go on...
  238. ----- HyperTalk script -----
  239. on mouseUp
  240.   visual effect barn door open
  241.   go to card "topics"
  242. end mouseUp
  243.  
  244.  
  245.  
  246.  
  247. -- part 16 (field)
  248. -- low flags: 81
  249. -- high flags: 2000
  250. -- rect: left=0 top=129 right=268 bottom=512
  251. -- title width / last selected line: 0
  252. -- icon id / first selected line: 0 / 0
  253. -- text alignment: 1
  254. -- font id: 3
  255. -- text size: 12
  256. -- style flags: 256
  257. -- line height: 16
  258. -- part name: Credits
  259.  
  260.  
  261. -- part 18 (button)
  262. -- low flags: 00
  263. -- high flags: A001
  264. -- rect: left=420 top=180 right=228 bottom=467
  265. -- title width / last selected line: 0
  266. -- icon id / first selected line: 11250 / 11250
  267. -- text alignment: 1
  268. -- font id: 0
  269. -- text size: 12
  270. -- style flags: 0
  271. -- line height: 16
  272. -- part name: Solutions
  273. ----- HyperTalk script -----
  274. on mouseUp
  275.   visual iris open to black
  276.   visual dissolve to white
  277.   go stack "Open Me First"
  278. end mouseUp
  279.  
  280.  
  281.  
  282. -- part 19 (button)
  283. -- low flags: 00
  284. -- high flags: A000
  285. -- rect: left=38 top=178 right=229 bottom=92
  286. -- title width / last selected line: 0
  287. -- icon id / first selected line: 27056 / 27056
  288. -- text alignment: 1
  289. -- font id: 0
  290. -- text size: 12
  291. -- style flags: 0
  292. -- line height: 16
  293. -- part name: Installer
  294. ----- HyperTalk script -----
  295. on mouseUp
  296.   -- Written for HyperPro by Phil Wyman of Selective Memory
  297.   -- Modified by Jim Anders of Kaidan 8-May-1988
  298.   global LongName,LongPath,ShortPath,totalPath,stacks
  299.   set userLevel to 5
  300.   put the visible of the msg into visiBox
  301.   answer "OK to put a button on your Home Card ?" with "Cancel" or "Go Ahead"
  302.   if it is "Cancel" then exit mouseUp
  303.   set cursor to 4
  304.   if the short name of this stack is not "Open Me First" then
  305.     get the length of the short name of this stack
  306.     put it into stackLength
  307.   else put 13 into stackLength
  308.   put the long name of this stack into LongName
  309.   put the value of word two of longName into ShortPath
  310.   repeat stackLength
  311.     put empty into last char of ShortPath
  312.   end repeat
  313.   put shortPath & ":" into LongPath
  314.   put shortPath & return & LongPath into totalPath
  315.   set lockscreen to true
  316.   choose button tool
  317.   click at the loc of card button "Solutions"
  318.   doMenu "Copy Button"
  319.   go home
  320.   go to card "Stacks"
  321.   put totalPath & return before field "paths"
  322.   put field "paths" into stacks -- reinitializing the global
  323.   go home
  324.   set lockScreen to false
  325.   doMenu "Paste Button"
  326.   put "Don't click. Move mouse & button to position. Then click." into msg
  327.   repeat until the mouseClick
  328.     set the loc of card button "Solutions" to the mouseLoc
  329.   end repeat
  330.   choose browse tool
  331.   put empty
  332.   set the visible of the msg to visiBox
  333.   set the userLevel to 2
  334. end mouseUp
  335.  
  336.  
  337.  
  338. -- part 20 (button)
  339. -- low flags: 00
  340. -- high flags: 0000
  341. -- rect: left=0 top=0 right=158 bottom=512
  342. -- title width / last selected line: 0
  343. -- icon id / first selected line: 0 / 0
  344. -- text alignment: 1
  345. -- font id: 0
  346. -- text size: 12
  347. -- style flags: 0
  348. -- line height: 16
  349. -- part name: Go on...
  350. ----- HyperTalk script -----
  351. on mouseUp
  352.   visual effect barn door open
  353.   go to card "topics"
  354. end mouseUp
  355.  
  356.  
  357.  
  358.  
  359. -- part 22 (button)
  360. -- low flags: 00
  361. -- high flags: 0000
  362. -- rect: left=0 top=155 right=256 bottom=30
  363. -- title width / last selected line: 0
  364. -- icon id / first selected line: 0 / 0
  365. -- text alignment: 1
  366. -- font id: 0
  367. -- text size: 12
  368. -- style flags: 0
  369. -- line height: 16
  370. -- part name: Go on...
  371. ----- HyperTalk script -----
  372. on mouseUp
  373.   visual effect barn door open
  374.   go to card "topics"
  375. end mouseUp
  376.  
  377.  
  378.  
  379.  
  380. -- part contents for card part 13
  381. ----- text -----
  382. By clicking on the installer button, on the left, a new "Solutions" button (like the one shown on the right) will be placed in your Home stack and linked to this stack.
  383.  
  384.  
  385. -- part contents for card part 16
  386. ----- text -----
  387.  
  388.  
  389. Developed for Apple Computer by:
  390.  
  391. CADventures: David Peltz
  392. Kaidan: Sunny Anders, Jim Anders
  393.